home *** CD-ROM | disk | FTP | other *** search
/ Technotools / Technotools (Chestnut CD-ROM)(1993).ISO / lang_c / c_windw / scroll1.c < prev    next >
Text File  |  1987-12-09  |  768b  |  28 lines
  1. /*  (c) Marietta Systems, Inc.  1987
  2. *   All rights reserved
  3. *
  4. *   Demonstration program for function scroll 
  5. */
  6. #include "mtest.h"
  7. void main(){
  8. int a;
  9. char text[20];
  10. clr_scrn("Scroll test");
  11. if (1 > mk_wndw(5, 20, 19, 60, NULL));
  12. for (a = 1 ; a < 14 ; a++){ 
  13.      sprintf(text, "This is line %d", a);
  14.      display(text, a, a, high); 
  15.      }
  16. /*    */
  17. disp_msg("To scroll (-1, 2), press a key",1); read_kb(); 
  18. scroll(-1, 2); 
  19. disp_msg("To scroll (0, 2), press a key",1);  read_kb(); 
  20. scroll(0, 2); 
  21. disp_msg("To scroll (2, 0), press a key",1);  read_kb(); 
  22. scroll(2, 0);
  23. disp_msg("To scroll (-1, 0), press a key",1); read_kb(); 
  24. scroll(-1, 0);
  25. disp_msg("To finish program, press a key",1); read_kb(); 
  26. goodbye(0);
  27. }
  28.